home *** CD-ROM | disk | FTP | other *** search
/ Language/OS - Multiplatform Resource Library / LANGUAGE OS.iso / lisp / eulisp / feel0_89.lha / Feel / bin / gcc2 / ld
Encoding:
Text File  |  1993-06-08  |  1.4 KB  |  71 lines
  1. #!/bin/sh
  2.  
  3. # $Id: ldn,v 1.2 90/11/29 21:48:09 is Exp $
  4. # $Log:    ldn,v $
  5. # Revision 1.2  90/11/29  21:48:09  is
  6. # Changed brad_export to denton_export
  7. # 
  8. # Revision 1.1  90/11/29  21:47:24  is
  9. # Replacement ld script for Eulisp
  10. # 
  11.  
  12. PATH=/usr/local/contrib/bin.sun4:/usr/local/bin:/bin:/usr/bin:/usr/ucb:$PATH
  13.  
  14. # A replacement LD script.
  15. # Go through the arguements, and try and guess which are the ones
  16. # which are elvira modules. Construct the setup function
  17.  
  18. echo "Building init_elvira.c"
  19. comline=""
  20. elviram=""
  21.  
  22. while [ $# -gt 0 ]
  23. do
  24.     case "$1" in
  25.     -d*)    ;;
  26.     -e)    shift ;;
  27.     /lib/crt0.o) ;;
  28.     -*)
  29.         comline="$comline $1";;
  30.     *init_elvira.o)
  31.         ;;
  32.     *elvira.o)
  33.         comline="$comline init_elvira.o $1";;
  34.     *.o)
  35.         comline="$comline $1"
  36.         elviram="$elviram $1";;
  37.     *)
  38.         comline="$comline $1";;
  39.     esac
  40.     shift
  41. done
  42.  
  43. # When we get here, we should have a list of .o files belonging to 
  44. # Elvira modules
  45. #
  46. # Look for their startup routines
  47.  
  48. elviram=`echo $elviram | sed 's/\.c/.o/g'`
  49.  
  50. initnames=`nm -gp $elviram | egrep ' T _INIT_' | awk '{print $3}' | sed 's/_//'`
  51.  
  52. rm -f init_elvira.c
  53. cat ${FEELDIR}/Src/el_linkins.c > init_elvira.c
  54.  
  55. echo '
  56. void initialise_elvira_modules(LispObject *stacktop) 
  57. {
  58.   dp = nil;
  59.   dlp = nil;
  60.  
  61. ' >> init_elvira.c
  62.  
  63. for i in $initnames
  64. do
  65. echo "    $i(stacktop);" >> init_elvira.c
  66. done
  67. echo "}" >> init_elvira.c
  68. unset COMPILER_PATH
  69. gcc  -c $ElviraHdrs init_elvira.c &&
  70. gcc   `echo $comline | sed -e 's/\/lib\/Mcrt1.o//'`
  71.